ocr: - TESTDLG-HSChPIERNUN nethod run(var eventinfo Event) var sDate, eDate Date retUal, qstring String finfo Formopeninfo F Forn endvar qstring = "Query DBOXFLDS.DB I Start date End date I Check <01/01/01 I Check EndQuery" info-querystring = qstring fInfo.nane - "DATERNG" if not .open(Finto) then nsg5top("Error", "Can't open dialog boxin" * errorHessage() return endif sleepo F.wait() sDate : .start date eDate - F.End date f.close0) sDate.vlew(start date") eDate.view("End date") endHethod Edt Line: 28 Col: 3
